TDP - ic /?D p I'’ 

!/ 4 // n-/ A v ( 


pRrouCT com* 

PHCQuCT "AME: 


n ATE ; 


MAMTATNFRi 
A U T H 0 R ( S ) : 


identification 

m AINPEC-15-QAUCC-A«wO 

! 'NICHaNNEL15 exerciser MODULE (UCl>) FOR PDP«15 
SYSTEM EXERCISER 

JULY 25, 1973 

DIAGNOSTIC GROUP 

Q , CHRISTOPHER 


COPYRIGHT (c) 1973 

DIGITAL EQUIPMENT CORPORATION 



1 


1, 


2 , 


n L S C ^ I P T I 0 v i 


this module in combin/i on with t r dec/xii exerc i ser module 


XUCAAl EXERCISES THE t 
OF ! 

A, MX15-9 \j 
B » 0*15 ( 

C, 2 DRU-C 1 ?^ 

PRCCPAM action 


CHaNNELI^ MARD w ABE which CONSISTS 


TEST SEQUENCE? 

POL tine 0 - 
ROUTINE 1 - 


WF.ITEil A 125252 ! ,m T T E R N TO BE CHECKED 
&V; T H f / OEC/X11 .EXERCISER MODULE, 


W j I T E » A 52525] ATTERN TO BE CHECKED 
B( THE DEC/X11/ EXERCISER MODULE, 


ROUTINE 2 - 
BOLT i N E 3 - 
ROUTINE 4 z 


CiECKS A 1252! (l PATTERN WHICH HaS b^EN WRITTEN 
H'i THE DEC/X1 ) EXERCISER MODULE, 

I l 

CHECKS A 5252! PATTERN WHJCh HAS BEEN WRITTEN 
Hi THE DFC/Xll EXERCISER MODULE, 

\ ; 

SfivOS Tcgpts ,0 PE CHECKED B Y THE UEC/Xll 
e> :rciser mooile, -ap i levels 




P ^Z 2 


3. IMPORTANT NOTES 


the paper tape BINARY (UC15) MODULE *UST be AQOEO Ic the 
PDF- 15 SYSTEM EXERCISER SYSTEM DEVICE U$lN G THE AQU C t A ) 

COMMAND , 

THIS MODULE m USt BE LOADED INTO PDP-13/PDP-U COMMON MEMORY. 

PRIOR TO STARTING THE DEC/XU EXERCISER, THIS NODULE MUST BE 
RUNNING AND HAVE OUTPUT THE MESSAGE ”UCl5 000001". W M J G H 
INDICATES THAT OEC/X11 MAY THEN (AND ONLY THEN) HE SMARTED, 

EACH TIME THIS MODULE IS LOADED FROM THE PDP»1* EXERCISER 
SYSTEM DEVICE, THE OPERATOR MUST START OR RESTART The DEC/XU 
FXFRcISER (WHEN APPROPRIATE), THIS ACTION IS NECESSARY TO 
SYNC THE TWO EXERCISERS. 

if tme operator wishes to issue a ctrl c ( f o T o both exercisers 

HE MUST no so IN THE FOLLOWING ORDER IF HE WISHES IC CONTINUE 
ROTH EXERCISERS AFTER INTERRUPTING THE RUN, FIRST ISSUE A CTRL C 
TO DEC/Xll. AND Wait FOR The POP-U to OUTPUT i t f s run summary 
ANC halt, then and ONLY then ISSUE A CTRL C To THE PDP-15 CXV* 
when CONTINUING The EXERCISERS AFTER DOING A CTRL C* THE POP-19 
ex; must BF ISSUED the EXECUTE (X) COMMAND and THIS MODULE must 
RE RUNNING BEFORE PRESSING CONTINUE ON THE PDP-11, BOTH EXERCISERS 
WILL AGAIN BE IN SYNC, 

PDF-iS DECTaPL TIMING ERRORS MaY RESULT AFTeR A UeC/XjlI MESSAGE 
IS OUTPUT, THEY SHOULD BE IGNORED WHEN IMMEDIATELY FOLLOWING 
THE OEC/XU MESSAGE, 

PDF-15 SYSTEM EXERCISE^ OPTION SUIITCMES 1-3 MUST 0L EQUAL TO 
ZERO UNTIL AFTER THE UCi5 000001 MFSSAGE IS TyPEU, 



M A^E 3 


4, FRPQRS 


PRFQP rOHE 


description 


MCI 5 000001 

"Cl & 00000? 

UC15 000003 
UCl5 000004 

MCI 5 00000S 

'JCl 5 000006 

"C5& 000307 


DOES NOT INDICATE AN ERROR! INDICATES THAT 
The UC15 MODULE IS NOW RUNNING and THAT the 
DEC/X11. EXERCISER MAY MOW BE STARTED, 

Indicates that the pqp*is is waiting for the 

PDP-11 TO SET THE TCRP ACCEPTED I^Aq, 

indicates that this module was entIbed* but 

that no U C 1 5> FLAG caused AN INTERRUPT, 

INDICATES THAT THE WRONG QRl5 API L£VeL WAS SET, 
AND ALSO OUTPUTS THE EXPECTED LEVEL | AND THE 
ACTUAL LEVEL THAT WAS SET, 

indicates that the dri5 api level indicated did 

MOT SET. 

indicates that the pdp»i5 detected a data error 
after the RQ P*u WROTE data into a BUFFER IN 
The COMMON memory, also output are the address, 
the data that was expected* and thl data that 
WAS FOUND, 

indicates that an api done interrupt failed to 
occur on the pdp*-ii s 



page 


UC15 SRC • UC15 EX, MOD, • H A I NUEC-l5-0*L CC-A • MAY 25, 197 

.TITLE • UC15 EX, m 0 0, • MA j NotC-l5.DAUCC-A * m ay 25 , 1973 • 

/ 

.EHREL 

/ 

/COPYRIGHT 1973 OIGITaL EQUIPMENT CcRp,, MaYNaRD, M A SS, 01754 



/IHPCRTAST NOTESi this MODULE MUST be loaoed and running in 

/ PDP-15/PUP-ll COMMON MEMORY, 

/ each time this module is loaded prom oictape, 

/ THE DEC/*ll EXERCISER MUST BE RESTARTED aT 

/ loc 10001 however before starting at 1000 , this m 0 cule 

/ MUST BE STARTED and RUNNING. CONVERSELY, EACH T 1 M p- 

/ DEC/xii is restarted at 1000 , this module must be 

/ RELOADED and running, 


00002 

R 

600007 

A 

UODSW 

600007 



00001 

R 

000000 

A 


0 



00002 

R 

000000 

A 


0 



00003 

R 

000000 

A 


0 



00004 

R 

000441 

R 


SERV 

/SERVICE ENTRANCE 

00005 

R 

000046 

R 


UCIN 

/INITIALIZATION 

entrance 

00006 

R 

250361 

A 


i S 1 XBT 'ueis 

« 


00007 

R 

654040 

A 

, 




00010 

R 

000020 

A 


20 

/mask for c h ajn 

MODE 

00011 

R 


A 


.BLOCK 7 



00020 

9 

000000 

A 

SYSERR 

0 



00021 

R 

000000 

A 

ERWC 

0 



00022 

R 

000000 

A 

ERCODE 

0 



00023 

R 

200000 

A 


0 



00024 

P 

000000 

A 


0 



00025 

R 

000000 

A 


0 



00026 

R 

000000 

A 


0 



00027 

R 

000000 

A 


0 



00030 

R 

000000 

A 


0 




.EJECT 


PAGE 2 UC15 SRC • UC15 EX, MOO',' • MAIN0EC-15«D*bCC-A t MAY 25, 1»7 

/THE DEFINITIONS OP ERROR MESSAGES pOR THIS MODULE FOLLOWl 
/ 

/UC15 WORO.l WORQ-2 WORO-J. WO«D;« 

/•■»•»- «»-<••« 

/ 

/ " 000001 

/ CODE #1 INDICATES THAT T«E IOP-1S MODULE IS NOW RUNNING, 

/ AND THAT THE OCC/Xli EXERCISER MAT NON BE STARTED, 

/ 

/ " 000002 

/-»-- 

/ COOE #e INDICATES THAT T h E »0P-15 Is WAITING POR THE POPiU 

/ TO SET THE DR15 TCBP ACCEPltD FLAG',' 

/ 

/ " 000003 

/-• 

/ ERROR #3 INDICATES THAT THl$ MODULE HAS ENTEREO BUT THAT NO 

/ ucis pla8 caused the intermit, 

/ 

/ " 000004 EXPcTED lvl actual LVL 

/ ERROR «4 INDICATES THAT THE WRONG DRIs’aP? LEVEL WAS SET'. 

/ " 00000? EXPcTEO LvL 

/-»-•» 

/ ERROR #3 INOICATEs t«AT THE DR15 API LEVEL INDICATED Of 0 NOT SET, 

/ 

/ " 000004 ADORES? GOOD^OATA BAD DATA 

/•••■ 

/ error *6 indicates that the pdp-is detected a data error apter 
/ THE PDP-11 WROTE OATA into I SUPPER'. 

/ " 000007 

/«■•“• ■••••! 

/ ERROR #7 INDICATE* that An |PI DONE INTERRUPT PaILED 

/ TO OCCUR ON The POP-ll» 

.EJECT 



Pag e 3 


MOD', • M A IND£C-15'DALCC*A • MAY 25, 197 


Ucl5 SHc • Uct5 £X, 


/ 




700401 

700402 

700406 

A 

A 

A 

TSF*700401 

TCF *700402 
TlS*7004F6 

00031 

fi 

706001 

A 

s i oa 

706001 

00032 

R 

706002 

A 

Cioo 

706002 

08033 

R 

706004 

A 

L I OR 

706004 

30034 

R 

706112 

A 

RORS 

706112 

00035 

R 

70*122 

A 

LDRS 

706122 

30036 

R 

706101 

A 

SAPI0 

706101 

3 0037 

R 

706121 

A 

SaPU 

706121 

*0040 

R 

706141 

A 

sap 1 2 

706141 

00041 

P 

706161 

A 

SaPI3 

706161 

00042 

R 

706104 

A 

CaP 1 0 

706104 

00043 

P 

706124 

A 

CAPIl 

706124 

00044 

R 

706144 

A 

Cap i 2 

706144 

00045 

a 

706164 

A 

Cap 1 3 

704164 

.EJECT 


/SKJP ON t'C DAT* ACCEPTED , SKIPS ON I/O DATA 
/ACCEPTED tL AG WHICH IS SET WHEN 11 READS TCBP’, 
/CUEAR I/O D*TA accepted flag 

/load I/O HEG, LOADS AC INTO I/O REG (NEW TCBP! 
/FUG, LOADS AC INTO I/O REG (BECOMES NEW TCBP! 
/READ DR STATUS REG (BIT 17*INT ENABLE! 

/LOAD Or STATUS REG (BIT 1?*INT ENABLE! 

/SKIP ON D k API LEVEL 0 FLAG 

/SKIP ON D* API LEVEL 1 FLAG 

/SKIP ON DM Apl LEVEL 2 FLAG 

/SKIP ON DO API LEVEL 3 FLAG 

/CLEAR D« *Pl LEVEL 0 FLAG 
/CLEAR DM Apl LEVEL 1 FLAG 
/CLEAR D« Ap I LEVEL 2 FLAG 
/CLEAR DM Ap I LEVEL 3 FLAG 
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UC15 

SRC 

» 

UC15 EX, 

MOO',' • MAINDEC- 

15”D*DCC*A • MAY 25, 197 

00046 

P 

.300000 

A 

/ 

UCIN 

0 



30047 

R 

777777 

A 


LAW 

-1 


00050 

R 

040403 

H 


DAC 

PASS 


00051 

R 

302046 

R 


LAC 

UCIN 


0005? 

a 

342441 

R 


DAC 

SERV 


00053 

P 

140406 

R 


D2m 

END 


20054 

fi 

140371 

R 


H2m 

API 


30055 

a 

140372 

R 


DiM 

BR« 


00056 

p 

140020 

R 


02m 

SYSERR 


00057 

a 

140021 

R 


02m 

ERWC 


00060 

p 

400032 

R 


XCT 

CIOO 


00061 

p 

200405 

R 


LAC 

IFLG 


0006? 

P 

750200 

A 


S2a ! CLA 


/FIRST TIME THROUGH SJNCE LOAOt 

00063 

R 

600072 

R 


JMP 

UC, 2 

/N« 

00064 

R 

777777 

A 


LAW 

-1 


00065 

R 

240020 

R 


DAC 

SYSERR 


00066 

R 

777777 

A 


LAW 

• 1 


30067 

fi 

040021 

R 


DAC 

ERWC 


20070 

R 

201203 

R 


LAC 

(1 


30071 

R 

040022 

R 


DAC 

CROOOE 


30072 

fi 

201203 

R 

UC , 2 

LAC 

(1 


00373 

R 

400035 

R 


XCT 

LDRS 


00074 

R 

100566 

R 


JMS 

EXIT 


00075 

R 

100644 

R 


JMS 

lvltst 


00076 

P 

400042 

R 


XCT 

CAR 1 0 


00077 

R 

201204 

R 


LAC 

(200*00 


00100 

R 

400033 

R 


XCT 

L I OR 

/SIND ADDRESS OF WBUF 

30101 

R 

100713 

R 


JMS 

TCBPAC 


00102 

P 

140405 

R 


02* 

iflg 


00103 

R 

440405 

R 


ISP 

IFLG 


00104 

R 

100601 

R 

UC,3 

JMS 

HOLO 


30105 

R 

201205 

R 


LAC 

( chembf 


00106 

R 

400033 

R 


XCT 

L10R 

/I N B TO 11 , INITIALISE, 

30107 

R 

100713 

R 


JMS 

TCBPAC 


00110 

P 

100124 

R 


JMS 

ROU0 


00111 

fi 

100601 

R 


JMS 

hold 


00112 

R 

100151 

R 


JMS 

R0U1 


00113 

R 

108601 

R 


JMS 

HOLO 


00114 

fi 

100217 

R 


JMS 

R0U2 


00115 

Q 

100601 

R 


JMS 

HOLD 


00116 

R 

100270 

R 


JMS 

R0U3 


00117 

fi 

100601 

R 


JMS 

HOLD 


00120 

fi 

1003*1 

R 


JMS 

R0U4 


00121 

R 

440403 

R 


IS? 

PASS 

/oore fasst 

00122 

fi 

600104 

R 


JMP 

UC','3 

/NO 

00123 

R 

600556 

R 


JMp 

TERM 







.EJECT 





5 


UC15 

SRC 

. UC 15 EX, 

MOD, . MAIN0EC-15-D*UCC'A • may 

25, 1 





/PQP-15 

WRITES 

A 125252 PATTERN 

4 P EP«U CHECKS 

IT, 

30124 

5 

000000 

A 

Roue 

0 




30125 

P 

140377 

R 


02m 

LUNTST 



30125 

P 

777600 

A 


LAW 

-200 



30127 

R 

040373 

R 


OAC 

CNT 



30133 

R 

201205 

R 


LAC 

(CMEMBP 



30131 

B 

040376 

R 


OAC 

8FPNU 



30132 

P 

201206 

R 


LAC 

(125252 



.30133 

fi 

060376 

R 

ROU0.1 

OAC* 

BFPNTl 

/lo buff 


30134 

R 

440376 

R 


IS? 

BFPNTl 

/inbr buff pnt 


3iU35 

R 

440373 

R 


IS? 

CNT 

/0OSE7 


30136 

R 

600133 

R 


JMP 

ROU0.1 

?NP 


"0137 

R 

750000 

A 


CL A 




00140 

R 

400033 

R 


xct 

L I OR 

/L» TcBP TO I NO 

OQNE 

30141 

P 

100713 

R 


JMS 

TCBPAC 



30142 

R 

201203 

R 


LAC 

(1 



00143 

P 

400035 

R 


XCT 

LDRS 



30144 

R 

100566 

R 

ROU0.2 

JMS 

EXIT 



30145 

B 

100644 

R 


JHS 

LVLTST 



00146 

ft 

400042 

R 

ROU0.3 

XCT 

CAPI0 

/CLB APJ L0 


00147 

n 

100746 

R 


JMS 

AP 1 ONE 



30150 

R 

620124 

R 


JMp* 

ROU0 








.EJECT 





6 


UC15 

SRC 

• UC15 EX, 

MOD',' • MAINOEC- 

15*0A[}CC*A • MAY 25 





/pOP»l5 

WRITES 

A 52525 PATTERN 

i pBf- 

11 CHECKS it 

00151 

4 

000000 

A 

R0U1 

0 




00152 

K 

201203 

R 


LAe 

<1 



00153 

P 

040377 

R 


OAC 

LUNTST 



00154 

R 

777600 

A 


LAW 

•>200 



00155 

R 

040373 

R 


OAC 

CNT 



00156 

K 

201205 

R 


LAC 

(CMEMBF 



00157 

R 

340376 

R 


DAC 

bfpnti 



00160 

R 

201207 

R 


LAC 

<52525 



00161 

R 

060376 

R 

ROUl.l 

OAC* 

bfpnti 

/LO buef 

00162 

R 

440376 

R 


IS? 

BFPNTl 

/ JNgR 

buff pnt 

00163 

R 

440373 

R 


IS? 

CNT 

/OPNIT 

00164 

R 

600161 

R 


JMP 

ROUl.l 

/NO 


00165 

R 

750000 

A 


CLA 




00166 

S 

400033 

R 


XCT 

LIOR 

/jn b 

OONE TO 11. 

00167 

R 

100713 

R 


JMS 

TCBPAC 



00170 

fi 

201203 

R 


LAC 

(1 



00171 

R 

400035 

R 


XCT 

LOPS 



00172 

R 

100566 

R 

R0U1.2 

JMS 

EXIT 



00173 

R 

400037 

R 


XCT 

SAP 1 1 

•'Ll* 


30174 

R 

741000 

A 


SKP 


/NO 


00175 

fi 

600214 

R 


JMp 

R0U1.3 

/Yl$. 

correct. 

00176 

R 

140400 

R 


OHM 

LVLSET 



00177 

R 

400036 

R 


XCT 

SAP I 0 

/Lit 


00200 

R 

741000 

A 


SKP 


/Ng 


30201 

R 

600615 

R 


JMP 

LVLERR 

/y?s. 

err, 

00202 

n 

201210 

R 


LAC 

(2 



00203 

R 

040400 

R 


DAC 

LVLSET 



00204 

R 

400040 

R 


XCT 

SAPI2 

/L?t 


00205 

R 

741000 

A 


SKP 


/NO 


30206 

R 

600615 

R 


JMP 

LVLERR 

/Yl8i 

err, 

00207 

R 

201211 

R 


LAC 

(3 



00213 

R 

040400 

R 


OAC 

LVLSET 



00211 

R 

400041 

R 


XCT 

SAP 1 3 

'L»t 


00212 

R 

740040 

A 


WLT 


/NO 


00213 

R 

600615 

R 


JMP 

LVLERR 


/YES, ERR 

00214 

R 

400043 

R 

R0U1.3 

XCT 

CAP 1 1 

/Ck» 

API LI 

00215 

P 

103746 

R 


JMS 

APtONE 



00216 

R 

620151 

R 


JMP* 

R0U1 








.EJECT 






page 


7 


UClP 

SRC 

» UCi5 EX, 

MOO, • ma!NDEC-15-DAlCC-A » MAY 





/PDP-11 

WRITES 

A 125252 PATTERN 

& M[3 p 

-15 CHECKS 

00217 

R 

000000 

A 

R0U2 

0 




0022,- 

fi 

201210 

R 


LAC 

(2 



00221 

P 

040377 

R 


DAC 

LUNTST 



00222 

fi 

777600 

A 


LAW 

-200 



0022.7 

fi 

040373 

R 


DAC 

CNT 



00224 

P 

201205 

R 


LAC 

(CMEMBF 



00225 

R 

040376 

R 


DAC 

BFPNU 



00226 

R 

750000 

A 


CLA 




00227 

R 

400033 

R 


XCT 

LIOR 

/I N B 

READY TO 1 

00230 

R 

100713 

R 


JMS 

TC8PAC 



00231 

fi 

201203 

fi 


LAC 

<1 



00232 

R 

400035 

R 


XCT 

LDRS 



00233 

P 

100566 

R 

«0U2.1 

JUS 

EXIT 



00234 

P 

400040 

R 


XCT 

SAPI2 

/L > ‘-1 


00235 

P 

741000 

A 


SKP 


/NO 


00234 

R 

600255 

R 


JMP 

R0U2.2 

/YES> 

correct. 

00237 

R 

140400 

R 


tl2M 

LVLSET 



00240 

R 

400036 

R 


XCT 

SAPI0 

/tut 


00241 

R 

741000 

A 


SKP 


/NO 


00242 

R 

600615 

R 


JMp 

lvlerr 

/Y^S > 

err , 

00243 

R 

201203 

R 


LAC 

(1 



00244 

R 

040400 

R 


DAC 

LVLSET 



00245 

P 

400037 

R 


XCT 

SAPH 

/Ll? 


00246 

R 

741000 

A 


SKP 


/NO 


30247 

R 

600615 

R 


JMP 

LVLERR 

/YES. 

err, 

30250 

R 

201211 

R 


LAC 

<3 



00251 

R 

040400 

R 


DAC 

LVLSET 



00252 

R 

400041 

R 


XCT 

SAP 1 3 

/L?* 


00253 

P 

740040 

A 


HIT 


/ N 0 


00254 

R 

600615 

R 


JMP 

LVLERR 

/YES, 

err, 

00255 

R 

400044 

R 

R0U2.2 

XCT 

CAP 1 2 

/CLS 

A p I L2 , 

00256 

R 

100746 

R 


JMS 

APJDNE 



00257 

R 

201206 

R 

R0U2.3 

LAC 

<125252 



00260 

R 

040402 

R 


DAC 

TGOOO 



00261 

R 

560376 

R 


SAD* 

BFPNTl 

/DATA 

correct? 

00262 

R 

741000 

A 


SKP 


/YES 


00263 

R 

100666 

R 


JMS 

DATERR 

/NO 


00264 

R 

440376 

R 


IS? 

BFPNTl 

/ I NpR 

buff PNT 

30265 

P 

440373 

R 


IS? 

CNT 

/D«NE7 

20266 

R 

600257 

R 


JMP 

R0U2.3 

/NO 


00267 

R 

620217 

R 


JMP* 

ROU2 








•EJECT 





6 


UC15 

SRC 

• UC15 EX, 

MOD', • maindec- 

15-0*uCC-A * m*Y 





/PDP-11 

WRITES 

A 52523 PATTERN 

S pUp-15 CHECKS 

00270 

fi 

000000 

A 

RQU3 

0 



00271 

R 

201211 

R 


LAC 

(3 


00272 

fi 

040377 

R 


DAC 

LUNTST 


00273 

fi 

777600 

A 


LAW 

-200 


00274 

fi 

14 0373 

R 


DAC 

CNT 


00275 

R 

201205 

R 


LAC 

(CMEMBF 


00276 

fi 

040376 

R 


DAC 

BFPNTl 


02277 

fi 

750000 

A 


CLA 



00300 

fi 

400033 

R 


XCT 

LIOR 

/ I N 6 READY TO ! 

00301 

P 

100713 

R 


JMS 

TCBPAC 


00302 

fi 

201203 

R 


LAC 

<1 


00303 

fi 

400035 

R 


XCT 

LDRS 


00304 

fi 

100566 

R 

R0U3.1 

JMS 

EXJT 


00305 

R 

400041 

R 


XCT 

SAP 1 3 

/l*t 

00306 

fi 

741000 

A 


SKP 


/ N 0 

00307 

fi 

600326 

R 


JMP 

R0U3.2 

/YE|, CORRECT, 

003ie 

R 

1 40400 

R 


02m 

LVLSET 


00311 

fi 

400036 

R 


XCT 

SAP 1 0 

'L»t 

00312 

fi 

741000 

A 


SKP 


/NO 

00313 

R 

600615 

R 


JMP 

LVLERR 

/YES . ERR, 

00314 

fi 

201203 

R 


LAC 

<1 


00315 

fi 

040400 

R 


DAC 

LVLSET 


00316 

fi 

400037 

R 


XCT 

SAPH 

'Li* 

30317 

R 

741000 

A 


SKP 


/NO 

00320 

R 

600615 

R 


JMP 

LVLERR 

/YlS. ERR, 

00321 

fi 

201210 

R 


LAC 

(2 


00322 

fi 

040400 

R 


DAC 

LVLSET 


00323 

fi 

400040 

R 


XCT 

SAP 1 2 

/L*| 

00324 

fi 

740040 

A 


HLT 


/n9 

02325 

fi 

600615 

R 


JMP 

lvlerr 

/Yll. ERR, 

00326 

fi 

400045 

R 

ROU3.2 

XCT 

CAPI3 

/C« API 13 

00327 

fi 

100746 

R 


JMS 

APIONE 


00330 

fi 

201207 

R 

ROU3.3 

LAC 

<52525 


00331 

fi 

040402 

R 


DAC 

TGOOO 


00332 

P 

560376 

R 


SAD* 

BFPNTl 

'0*T* CORRECT! 

00333 

II 

74i000 

A 


SKP 


'Yll 

00334 

fi 

100666 

R 


JMS 

DATERR 

/NO 

00335 

fi 

440376 

R 


IS? 

BFPNTl 

/JNB" BUFF PNT 

00336 

R 

440373 

R 


IS? 

CNT 

/D9hE? 

00337 

R 

600330 

R 


JMP 

ROUS , 3 

/NO 

00340 

R 

620270 

R 


JMP* 

ROUS 



.EJECT 



PAGE 9 


UC15 SRC « UC15 t x < MOD,' * MA InDe C ' 15 "° A '' CC ' A • MAY 25, 197 

/TESTS Fop CORRECT TRANSMISSION UF TCBM 4 DR15 INTERRUPTS. 


'■‘341 

P 

,103000 

A 

R0U4 

0 



•Y'343 

R‘ 

1-4 ’404 

R 


■02m 

TCRP 

/ I N I T I CRP 

0/ 34 T 

c 

70'lA" 4 

R 

»0U4,1 

LAC 

TCDP 


■’ l.:# 3 4 4 

R 

40/033 

R 


XCT 

L I OR 

/LU TCbP 

*kj345 

R 

107713 

R 


JMS 

TCBPAC 



P 

201203 

R 


LAC 

(1 


.’0347 

K 

407035 

R 


XCT 

LDRS 

/E N *BLt 0R15 INT 

J335? 

fi 

147377 

R 


OHm 

LUNTST 


’0351 

R 

143400 

R 


D2M 

LVLSET 


0035? 

R 

103566 

R 

RQU4.2 

JMS 

EXIT 


30353 

5 

750000 

A 


CLA 



’3354 

R 

400035 

R 


XCT 

LDRS 

/Ol5*BLE OR INT 

30355 

R 

100644 

R 


JMS 

lvltst 


0J355 

P 

400042 

R 


XCT 

CAP I 0 

/CI.R L» 

30357 

R 

100746 

R 


JMS 

APIDNE 


3 036 3 

P 

200404 

R 


LAC 

TCRP 


00361 

P 

541212 

R 


SAO 

(77777 

/DOrET 

00362 

P 

623341 

R 


JMP* 

R0U4 

/rls 

30363 

R 

440404 

R 


IS? 

TCRP 

/NO 

00364 

P 

603343 

R 


JMP 

R0U4.1 



.EJECT 


PAGE 10 UC15 SRC # UC15 EX, MOD, * MAIn0eC-15-D*bCC'A • MAY 25, 197 


/TEMPORARY STORAGE 


00365 

fl 

300000 

A 

CnTI 

0 



30366 

R 

000000 

A 

CNT2 

0 



00367 

R 

300000 

A 

CNT3 

0 



70370 

R 

303000 

A 

CNT5 

3 



00371 

P 

000000 

A 

API 

3 



00372 

P 

700000 

A 

SRK 

3 



30373 

fi 

000000 

A 

cnt 

0 



00374 

P 

300000 

A 

POINT 

0 



30375 

R 

300000 

A 

PNT 

0 



30376 

R 

303000 

A 

BFPNTl 

3 



00377 

« 

300000 

A 

LUNTST 

0 



30403 

P 

000000 

A 

LVLSET 

0 



00401 

R 

000000 

A 

SAVAC 

0 



00402 

R 

000000 

A 

TGOOD 

3 



00403 

R 

303000 

A 

PASS 

3 



30404 

R 

000000 

A 

TCBP 

0 



00405 

R 

300000 

A 

IFLG 

3 



00406 

R 

300000 

A 

END 

3 







/TEMPORARY STORAGE FOR ERROR STATU? 

00407 

P 


A 

SaVBUF 

.BLOCK 

11 






/RETRIEVE ERROR 

STATUS FOR 

monitor 

00420 

B 

000000 

A 

RESTaT 

0 



30421 

R 

777767 

A 


LAW 

"11 


00422 

R 

040365 

R 


DAC 

CNTl 

?IN|T COUNT 

30423 

R 

201213 

R 


LAC 

(SYSERR 


30424 

R 

040374 

R 


DAC 

POINT 

?l N tT POINTER 

30425 

R 

201214 

R 


LAC 

(SAVBUF 


00426 

P 

340375 

R 


DAC 

PNT 

/J*»T POINTER 

00427 

R 

220375 

R 


LAC* 

PNT 


00430 

R 

103435 

R 


JMS 

STATUS 

?SlD"E A WORD 

004J1 

R 

440375 

R 


ISZ 

PNT 


00432 

R 

440365 

R 


IS? 

CNTl 

'DRhET 

00433 

R 

600427 

R 


JMP 

■ "4 

/NO 

00434 

R 

620420 

R 


JMP* 

RE5TAT 






/STORE 

STATUS 



00435 

S 

000000 

A 

STATUS 

0 



00436 

fi 

060374 

R 


DAC* 

POINT 


00437 

R 

440374 

R 


ISZ 

POINT 


00440 

R 

620435 

R 


JMP* 

STATUS 



.EJECT 



page 11 


UC15 c *c 


UC15 EX, mou; 


ma!nDeC- 15-0*ECC-A , MAY 25, l?7 


/SERVICE routine 


-'It' 4 41 

fi 

, 300000 

A 

serv 

0 



/U44? 

fi 

340401 

R 


DAC 

SAVAC 


C tj 4 4 3 

fi 

200372 

R 


LAC 

BRK 

/RETURN prom brk? 

ti/444 

R 

7412O0 

A 


SM 


->/445 

q 

600447 

H 


JMP 

SERV.A 

/nu 

0 0 4 4* 

p 

620566 

R 


IMP* 

EXIT 


3 0 4 4 7 

R 

201215 

R 

SERV.A 

LAC 

(400000 


00450 

p 

705501 

A 


SPI 


/ami on? 

00451 

R 

600515 

R 


JMP 

APIOFE 

/ N u 

3045? 

p 

777777 

A 


LAW 

-1 


30453 

p 

040371 

R 


OAC 

API 


30454 

R 

4000X4 

R 


XCT 

RDRS 


33455 

p 

501203 

R 


AND 

(1 


3 0 4 54 

S 

741200 

A 


SNA 


/ D K i 5 INT ENABLE SET? 

30457 

R 

600476 

R 


JMP 

serv, a 

/N« 

30460 

R 

750000 

A 


CLA 



30461 

R 

400035 

R 


XCT 

LORS 

/Ol$*BLE DR15 JNT 

30462 

p 

400036 

R 


XCT 

SAP 1 0 

/ Aft 1.0 ELO SET? 

00463 

fi 

741000 

A 


SKP 


/NO 

30464 

R 

620566 

R 


JMP* 

EXIT 

/yes 

30465 

R 

4000X7 

R 


XCT 

SAP 1 1 

/Ll SET? 

30464 

R 

741000 

A 


SKP 


/NO 

30467 

K 

620566 

R 


JMP* 

EXIT 

/YES 

20473 

fi 

400040 

R 


XCT 

SAP 1 2 

/t* SET? 

3 0 4 71 

R 

741000 

A 


SKP 


/NO 

03472 

R 

620566 

R 


JMP* 

EXIT 

/YES 

00473 

R 

400041 

R 


XCT 

SAPI3 

/L 3 SET? 

70474 

R 

741000 

A 


SKP 


/NO 

30475 

P 

620566 

R 


JMP* 

EXIT 

/YES 

00476 

P 

201214 

R 

serv , b 

LAC 

(SAVBUE 


30 4 77 

R 

040374 

R 


OAC 

POINT 


30500 

R 

777775 

A 


LAW 

-3 


f! 0 501 

R 

1004X5 

R 


JMP 

STATUS 


30502 

R 

777777 

A 


LAW 

-1 


2050 3 

R 

100435 

R 


JMS 

status 


00504 

c 

201211 

R 


LAC 

(3 


70505 

p 

1 00435 

R 


JMS 

STATUS 


30506 

c 

200020 

R 


lac 

SYSERR 


20507 

p 

740200 

A 


S3 a 


/PREVIOUS ERROR? 

3 3 51;’ 

S 

100546 

R 


JMS 

brkex 

/YES 

3 3511 

P 

100420 

R 


JMS 

restat 

/g e ? status for MON 

3051? 

P 

100566 

R 


JMS 

EXIT 


3 0 5 1 X 

R 

743040 

A 


hlt 


/MONITOR ERROR t t ! I 

'•','514 

C 

600513 

R 


JMP 

.EJECT 

.-1 



page 12 


UC15 

SRC 

• 

UC15 EX. 

MOD, » MAINDEC- 

15-DAOCC-A • MAY 25, i97 

00515 

fi 

140371 

R 

APIOFE 

OZM 

AP I 


00516 

P 

400034 

R 


XCT 

RDRS 


00517 

fi 

741200 

A 


SNA 


/0M*9 INT ENABLE SET? 

00520 

fi 

600537 

R 


JMP 

SERV , C 

/NO 

00521 

fi 

750000 

A 


CLA 



00522 

fi 

400035 

R 


XCT 

LORS 

/DISABLE DR15 INT 

00523 

fi 

400036 

R 


XCT 

SAP I 0 

/L.0 SET? 

30524 

fi 

741000 

A 


SKP 


/N° 

00525 

fi 

620566 

R 


JMP* 

EXIT 

/YES 

00526 

fi 

400037 

R 


XCT 

sap 1 1 

/ Ll SET? 

00527 

fi 

741000 

A 


SKP 


/NO 

00530 

fi 

620566 

R 


JMP* 

EXIT 

/YES 

00531 

fi 

400040 

R 


XCT 

SAP I 2 

/L* set? 

00532 

fi 

741000 

A 


SKp 


/NO 

00533 

P 

620566 

R 


JMP* 

EXIT 

/YES 

20534 

fi 

400041 

R 


XCT 

SAPI3 

/l 3 SET? 

00535 

c 

741000 

A 


SKP 


/NO 

03536 

fi 

620566 

R 


JMP* 

EXIT 

/YES 

00537 

fi 

200406 

R 

serv.c 

LAC 

END 

00540 

fi 

740200 

A 

S?A 



00541 

fi 

600544 

R 


JMP 

.*S 


0054? 

fi 

20i233 

R 


UAC 

(1 


00543 

fi 

400035 

R 


XCT 

LORS 

/E*»BLE 0R15 INT 

00544 

fi 

750001 

A 


CLC 


/NO 

00545 

fi 

620441 

R 


JMP* 

SERV 

/I*B I N T WITH NO ELG SET.'???? 





/break 

EXIT TO 

The MONITOR 


00546 

fi 

000000 

A 

BRKEX 

0 



’0547 

fi 

777773 

A 


LAW 

•5 

/indicate normal break 

30553 

fi 

040020 

R 


OAC 

SYSERR 


00551 

fi 

777777 

A 


LAW 

*1 


0055? 

fi 

040372 

R 


DAC 

BRK 

/SET BREAK FLA8 

00553 

p 

100566 

R 


JMS 

EXIT 


00554 

c 

140372 

R 


dzm 

BRK 

/cL|*r break flag 

00555 

R 

620546 

R 


JMP* 

BRKEX 



.EJECT 



page 13 


UC15 

SRC 

• 

UC15 EX, 

MOD, » MaINDEC 

-15'D a (jCC'A 

» MA y 25, 197 





/term i nat i cr routine 



0Z556 

& 

140021 

R 

term 

52 M 

ERWC 



3 5557 

s 

148406 

R 


OHm 

END 



,V56/ 

a 

440406 

R 


I sz 

END 



2 fc 5 6 1 

G 

777774 

A 


LAW 

-4 



30562 

R 

240020 

R 


DAC 

SYSERR 



00563 

fi 

140372 

R 


OHM 

BRK 



30 56 4 

R 

100566 

R 


JMS 

EXIT 



5"fe;56'5 

R 

740040 

A 


HLT 


/MONITOR 

ERROR 





/exit 

To The monitor 



00566 

R 

000000 

A 

exit 

0 




0056? 

a 

200371 

R 


LAC 

API 

/ENTERED 


00570 

R 

741200 

A 


SNA 


BY API? 

00571 

R 

600576 

R 


JMP 

,♦5 

/nP 


00572 

R 

140371 

R 


OHM 

API 

/CWE*R API FLAG 

00573 

B 

200401 

R 


LAC 

SAVAC 

/RESTORE 

AC 

00574 

S 

703344 

A 


GBR 




0K575 

R 

620441 

R 


JMp» 

serv 



20576 

n 

750000 

A 


CLA 




30577 

R 

703344 

A 


OBR 




3060? 

R 

620441 

R 


JMP* 

SERV 







/HOLD 

EXECUTION 

ON AC SWITCH 

13«1 


20601 

R 

000000 

A 

HOLD 

0 




0060? 

P 

750004 

A 


LAS 




20603 

P 

501216 

R 


ANO 

(20 



00604 

P 

740200 

A 


SHA 




00606 

R 

600610 

R 


JMP 

.♦3 



00606 

R 

140614 

R 


ohm 

HOLDSW 



20607 

R 

620601 

R 


JMP* 

HOLD 



00610 

R 

777777 

A 


LAW 

*1 



00611 

P 

040614 

R 


DAC 

HOLOSW 



00612 

R 

100546 

R 


JMS 

9RKEX 



00613 

B 

600602 

R 


JMP 

f 

hold*i 



00614 

K 

000000 

A 

HOLOSW 

0 

.EJECT 
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UC15 

SMC 

* 

UC15 EX, 

MOO, • MaJNOeC- 

15-OAUCC-A • MAY 25, 1«7 





/ROUTINE TO INO 

WRONG DP15 API 

level was brought UP. 

00615 

R 

201214 

R 

LVLERR 

LAC 

(SAVBUF 


00616 

R 

040374 

R 


DAC 

POINT 


00617 

R 

400042 

R 


XCT 

CAPI 0 


00620 

R 

400043 

R 


XCT 

CAPIl 


00621 

P 

400044 

R 


XCT 

CAPI2 


00622 

R 

400045 

R 


XCT 

CAP 1 3 


00623 

B 

777775 

A 


LAW 

"3 


00624 

R 

100435 

R 


JMS 

STATUS 


00625 

P 

777775 

A 


LAW 

-3 


00626 

P 

100435 

R 


JMS 

STATUS 


00627 

P 

201217 

R 


LAC 

<4 


00633 

R 

100435 

R 


JMS 

STATUS 


00631 

P 

200377 

R 


lac 

LUNTST 

/GEt EXPECTED LEVEL. 

00632 

R 

100435 

R 


JM9 

STATUS 

00633 

R 

200400 

R 


LAC 

LVLSET 

/GlT ACTUAL LEVEL, 

00634 

R 

100435 

R 


JMS 

STATUS 


00635 

P 

200020 

R 


LAC 

SYSERR 


00636 

R 

740200 

A 


SHA 


/PREVIOUS ERR? 

P0637 

R 

100546 

R 


JMS 

BRKEX 

'YSS 

00642 

R 

100420 

R 


JMS 

RESTAT 

/Glj STATUS EO* MON. 

30641 

R 

100566 

R 


JMS 

exit 

0064? 

fi 

740040 

A 


HLT 


/M9MT0R ERROR 1 1 1 1 

00643 

R 

600642 

R 


JMP 

.-1 

00644 

R 

300000 

A 

IVLTST 

7 



00645 

a 

140377 

R 


OHM 

LUNTST 


00646 

P 

140400 

R 


OHm 

LVLSET 


30647 

p 

400036 

R 


XCT 

SAP 1 0 

'L»t 

00650 

R 

741000 

A 


SKP 


/NO 

00651 

R 

620644 

R 


JMp* 

LVLTST 

'Y§$i CORRECT. 

00652 

P 

440400 

R 


IS? 

LVLSET 

00653 

R 

400037 

R 


XCT 

SAPU 

‘'Lit 

00654 

R 

741000 

A 


SKP 


00655 

R 

608615 

R 


JMP 

LVLERR 


00656 

R 

440400 

R 


IS? 

LVLSET 


00657 

R 

400040 

R 


XCT 

SAP 1 2 


00660 

R 

741000 

A 


SKP 



00661 

R 

600615 

R 


JMP 

LVLERR 


00662 

R 

440400 

R 


IS? 

LVLSET 


00663 

R 

400041 

R 


XCT 

SAP 1 3 


00664 

R 

740040 

A 


HLT 


/ 1*6 1 CATES A FLG INTERRUPTED. BUT NO FLG??? 

00665 

R 

600615 

R 


JMP 

.EJECT 

LVLERR 




PA G t 


15 


urns 

sue 

* UC15 EX, 

HOO, » 0. 





/ROUTINE To InD 

THAT A 1 

V 6 6 6 

R 

•'7 0000 

A 

0 A T£ 0 R ” 


V6 67 

P 

?0 12 14 

R 

LAC 

(Savbjf 

■'067? 

R 

3 4 ?3 74 

R 

OAC 

POINT 

•"<.’671 

c 

777776 

A 

LAW 

-2 

'0672 

R 

103435 

R 

JMS 

STATUS 

”7.673 

R 

777774 

A 

LAW 

-4 

17674 

p 

100435 

R 

jms 

status 

37675 

R 

?01220 

R 

LAC 

(6 

”7*76 

R 

120435 

R 

JMS 

STATUS 

20677 

P 

200376 

R 

LAC 

rfpnU 

70772 

R 

100435 

R 

JMS 

STATUS 

7 7 771 

R 

700432 

R 

LAC 

TGfion 

2070? 

P 

100435 

R 

JMP 

STATUS 

70703 

R 

220376 

R 

LAC* 

BFPNTi 

00704 

fi 

100435 

R 

JMS 

STATUS 

20705 

R 

?00k)20 

R 

LAC 

SYSERR 

00706 

R 

740200 

A 

S2 A 


”0707 

R 

100546 

R 

JMS 

BRKEX 

00713 

R 

100420 

R 

JMS 

RESTAT 

’0711 

R 

100546 

R 

JMS 

brkex 

7071? 

P 

620666 

R 

JMP» 

oaterr 





.EJECT 



/P*EVJOUS err? 

/ytS 

/ g|' r status fqr won. 


PACE 16 


UC15 

SHC 

» 

UC15 EX, 

MOO’, • MAlNOEC 

-15“DA|jCC”A • MAY 25 

20713 

fi 

>00020 

A 

/ 

TcBPaC 

0 



00714 

c 

777775 

A 


LAW 

-3 


”071? 

R 

>40373 

R 


OAC 

CNT5 


00716 

R 

1 40366 

R 


02m 

CNT2 


00717 

R 

420031 

R 

TCB.l 

xct 

SIOA 

/T?gP ACCEPTED? 

00 72? 

C 

60072.3 

R 


JMP 

TCB.2 

/NO 

00 721 

R 

400032 

R 


XCT 

C I 00 

/ YEj 

7 0 722 

R 

620713 

R 


JMP* 

TCBPAC 


27723 

R 

100546 

R 

TCB.2 

JMS 

BRKEX 


■00724 

R 

440366 

R 


!S2 

CNT2 

/TP» AGAIN? 

30725 

R 

600717 

R 


JMP 

TC0.1 

/yl$ 

0 2 726 

R 

440370 

R 


IS? 

CNT5 


00727 

C 

600717 

R 


JMP 

TCB.l 


”073? 

R 

201214 

R 


LAC 

(SAVBJF 


'0731 

R 

.'40374 

R 


OAC 

POINT 


‘0 737 

R 

777776 

A 


LAW 

-2 


1/7J3 

R 

100435 

R 


JMS 

STATUS 


00734 

R 

777777 

A 


LAw 

-1 


00735 

H 

100435 

R 


JMS 

STATUS 


”0736 

c 

201210 

R 


LAC 

(2 


w 7 3 7 

c 

1 00435 

R 


JMS 

STATUS 


”074 7 

R 

200020 

R 


LAC 

SYSERR 


00 741 

P 

740200 

A 


S2 4 



0 0 7 A ? 

R 

100546 

R 


JMS 

BRKEX 


0 1) 7 4 ” 

P 

100420 

R 


JMS 

RESTAT 


02744 

P 

100546 

R 


JMS 

BRKEX 


00-745 

R 

600714 

R 


JMP 

TCBPAC*! 







.EJECT 
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UC15 


UC16 EX. MD, 


'<AIMDEC-15-D» l CC-A « MAY 25, 197 


R R" 


/ 


”70746 

u 

"00000 

A 

API'J- t 

7 



’• 0 7 4 7 

fi 

777775 

A 


L A V 

-3 


’I 75 . 

fi 

.47673 

R 


OAO 

CNT5 


40 751 

fi 

1 40367 

R 


0 6>‘. 

CNT3 


n 0 7 5 p 

fi 

201012 

R 

AP! .1 

LAC 

COHM 


'’0 75 3 

fi 

741200 

A 


S(. A 


Zap 1 DONE? 

00754 

fi 

600757 

R 


JhP 

API. 2 

/ MU 

7,! 75 5 

fi 

1.41032 

R 


DZm 

COMM 

ZYS-S 

70755 

fi 

62^746 

R 


JMP» 

API ONE 


’0757 

fi 

100546 

R 

Ap! .2 

JMR 

BRKEX 


307o. 

fi 

440367 

R 


IS? 

CNT3 

/ T X K E OUT? 

7 0 761, 

c 

620752 

R 


JHP 

API.l 

'NO, THY AGAIN 

3076? 

fi 

440370 

R 


IS? 

CNT5 


00 76 3 

fi 

603752 

R 


JHP 

API.l 


7 0 76 4 

fi 

201214 

R 


LAC 

{SaVBUF 


’ tj 7 6 5 

fi 

040374 

R 


OAC 

POINT 


70766 

P 

777776 

A 


LAW 

-2 


70767 

fi 

100435 

R 


JMS 

STATUS 


70770 

fi 

777777 

A 


LAW 

-1 


00 771 

R 

100435 

R 


JMS 

STATUS 


3377? 

fi 

201.221 

R 


LAC 

(7 


"0773 

fi 

100435 

R 


JMS 

STATUS 


(50 77 4 

fi 

200020 

R 


LAC 

SYSERR 


00775 

fi 

740200 

A 


SZa 



00776 

fi 

100546 

R 


JMS 

BRKEX 


00777 

c 

100420 

R 


JHS 

RESTAT 


01000 

fi 

100546 

R 


JHS 

BRKEX 


01001 

fi 

600747 

R 


JHP 

•EJECT 

APIDNE*! 
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UC15 

SRC 

* 

UC15 EX, 

MOO, • MAlN0EC-15”D*i, c C-A » mAY 25 , 1?7 

"120? P 

300000 

A 

/ 

COHM 

t 

0 


71(103 fi 
"1203 R 

000000 

A 

/ 

cmembf 

0 

• LOC 

ZTHJS BUFFER IS 128 DECIMAL LOC 
CMEMBF *230 'L u N g ANO IS USED FOR THE COMMON 

/mErORT TESTS, 


.700000 

R 


, E NO 

uonsw 


71203 fi P00001 A »L 

71204 R 200000 A *L 

71205 R (101003 R *L 
01205 R 129252 A *1 
01207 R 052525 A *1 
21217 R 700002 A *1 
01211 R 700003 A *L 
0121? fi 077777 A *L 

01213 R 000020 R *L 

01214 R 000427 R *L 
71215 R 400000 A »L 
7 12 1 A R 000020 A »L 
a 12l7 R 000004 A «L 

01220 R 000006 A «L 

01221 R 000007 A »L 

S12E = 6)1226 NO ERROR LINES 



